home *** CD-ROM | disk | FTP | other *** search
- /*********************************************
- * *
- * PostView-Driver, Version 1.0 (26.03.1994) *
- * *
- *********************************************/
-
- /*************
- * Arguments *
- *************/
- ARG filename dirname
-
- filename = TRANSLATE(filename, XRANGE('a','z'), XRANGE('A','Z'))
- dirname = TRANSLATE(dirname, XRANGE('a','z'), XRANGE('A','Z'))
- postfile = filename || ".ps"
-
- ADDRESS COMMAND "Delete >NIL:" postfile
- ADDRESS COMMAND Rename filename postfile
-
- ADDRESS COMMAND "SYS:TeX/Post/PostView/PostView >NIL: INIT SYS:TeX/Post/PostView/init.ps XDpi 150 YDpi 150 XSize 760 YSize 1610 DXSize 670 DYSize 430 FILE" postfile
-
- EXIT
-